#!/usr/bin/perl

##############################################################################################
#                                                                                            #
#     BatMUD Tools by Tumi - a supporting site with tools for multiplayer game BatMUD        #
#     Copyright (C) 2002-2007 Tuomo 'Tumi' Tanskanen                                         #
#                                                                                            #
#     This program is free software; you can redistribute it and/or modify it under          #
# the terms of the GNU General Public License as published by the Free Software              #
# Foundation; either version 2 of the License, or (at your option) any later version.        #
#                                                                                            #
#     This program is distributed in the hope that it will be useful, but WITHOUT ANY        #
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A            #
# PARTICULAR PURPOSE. See the GNU General Public License for more details.                   #
#                                                                                            #
#     You should have received a copy of the GNU General Public License along with           #
# this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place,        #
# Suite 330, Boston, MA 02111-1307 USA                                                       #
#                                                                                            #
##############################################################################################

use strict;

my %colours = (
	"#"  => "ruins",
	"+"  => "crossing",
	"/"  => "swneroad",
	"?"  => "sceniclocation",
	"F"  => "deepforest",
	"S"  => "shallow",
	"\\" => "nwseroad",
	"b"  => "beach",
	"d"  => "desert",
	"h"  => "hills",
	"j"  => "jungle",
	"p"  => "plain",
	"s"  => "swamp",
	"v"  => "valley",
	"x"  => "badlands",
	"z"  => "shore",
	"~"  => "sea",

	"!"  => "peak",
	"%"  => "speciallocation",
	"-"  => "eastwestroad",
	"="  => "bridge",
	"C"  => "playercity",
	"R"  => "deepriver",
	"V"  => "volcano",
	"^"  => "mountain",
	"c"  => "city",
	"f"  => "forest",
	"i"  => "highlands",
	"l"  => "lake",
	"r"  => "river",
	"t"  => "tundra",
	"w"  => "waterfall",
	"y"  => "field",
	"|"  => "northsouthroad"
);


sub getColourHash {
	return (%colours);
}


1;
